object MemoReplaceForm1: TMemoReplaceForm1 Left = 70 Top = 117 ActiveControl = ReplaceButton BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Confirm Text Replacement' ClientHeight = 299 ClientWidth = 344 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 9 Top = 56 Width = 158 Height = 17 AutoSize = False Caption = 'Source comment:' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False Transparent = True end object Label2: TLabel Left = 177 Top = 56 Width = 158 Height = 17 AutoSize = False Caption = 'Destination comment:' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False Transparent = True end object Label3: TLabel Left = 8 Top = 36 Width = 325 Height = 17 Alignment = taCenter AutoSize = False Caption = 'The source and destination images have different comments.' Transparent = True end object Image1: TImage Left = 20 Top = 260 Width = 32 Height = 32 AutoSize = True Center = True Picture.Data = {} end object Label4: TLabel Left = 8 Top = 239 Width = 325 Height = 17 Alignment = taCenter AutoSize = False Caption = 'What do you want to do with the destination comment?' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False end object Memo1: TMemo Left = 8 Top = 72 Width = 160 Height = 160 Enabled = False ReadOnly = True TabOrder = 0 end object Memo2: TMemo Left = 175 Top = 72 Width = 160 Height = 160 Enabled = False ReadOnly = True TabOrder = 1 end object ReplaceButton: TButton Left = 83 Top = 264 Width = 75 Height = 25 Caption = '&Replace it' Default = True ModalResult = 1 TabOrder = 2 OnClick = ReplaceButtonClick end object KeepButton: TButton Left = 187 Top = 264 Width = 75 Height = 25 Cancel = True Caption = '&Keep it' ModalResult = 2 TabOrder = 3 end object FileEdit: TEdit Left = 28 Top = 4 Width = 309 Height = 21 BorderStyle = bsNone Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 4 Text = 'x' end end